Thực đơn
Fortran Ví dụChương trình "Hello" có thể chạy được sau khi dịch bằng bất cứ trình dịch nào kể từ Fortran 90 trở đi.
1 program chaothegioi2 print*,"Chao The Gioi!"3 end program chaothegioi
Chương trình này, tính diện tích của hình trụ, chạy khi được dịch bởi bất cứ trình dịch nào kể từ Fortran 90 trở đi. Các chữ đứng sau dấu !
trên cùng dòng sẽ không được dịch, và coi như chú thích của người viết chương trình, để giúp người đọc dễ hiểu hơn.
1 program HinhTru 2 ! Tinh dien tich Hinh tru. 3 ! 4 ! Khai bao bien. 5 implicit none ! Yeu cau moi bien can duoc khai bao -- danh cho Fortran 90. 6 integer:: Loi 7 real:: BanKinh,ChieuCao,DienTich 8 real, parameter:: Pi = 3.14159 9 do10 ! Nhac nguoi dung nhap Ban kinh va Chieu cao.11 write (*,*) "Nhap Ban kinh va Chieu cao, nhan 't' de thoat."12 read (*,*,iostat=Loi) BanKinh,ChieuCao13 ! 14 ! Neu khong nhap duoc, thoat.15 if (Loi /= 0) stop "thoat"16 !17 ! Tinh dien tich. Ky hieu ** nghia la "luy thua".18 DienTich = 2*Pi*(BanKinh**2 + BanKinh*ChieuCao)19 !20 ! Viet (BanKinh, ChieuCao) va (DienTich) ra man hinh.21 write (*,"(1x,'BanKinh=',f6.2,5x,'ChieuCao=',f6.2,5x,'DienTich=',f6.2)") BanKinh,ChieuCao,DienTich22 end do23 end program HinhTru
Chú ý: câu lệnh
write (*,"(1x,'BanKinh=',f6.2,5x,'ChieuCao=',f6.2,5x,'DienTich=',f6.2)") BanKinh,ChieuCao,DienTich
có sử dụng khai báo định dạng trong Fortran. Có thể giải thích sơ lược như sau:
1x
nghĩa là một ký tự trống. Số ký tự trống cần in ra đi trước chữx
.f6.2
tương ứng với số thực có 6 chữ số, trong đó 2 chữ số trong phần thập phân.Kiểu định dạng chuỗi này của riêng Fortran, nó rất khác so với chuẩn định dạng printf
của ngôn ngữ lập trình C vốn được sử dụng rộng rãi.
Thực đơn
Fortran Ví dụLiên quan
Fortran Fort Ransom, Quận Ransom, Bắc Dakota Fortean Times Fortanete Fortan Forteana Ford Ranger Fort Hancock, Texas Forth and BargyTài liệu tham khảo
WikiPedia: Fortran http://www.absoft.com http://acmqueue.com/modules.php?name=Content&pa=sh... http://www.cray.com/ http://www.fortran.com http://www.fr.fse.fujitsu.com/devuk/solaris.shtml http://h18009.www1.hp.com/fortran http://www-306.ibm.com/software/awdtools/fortran http://www.intel.com/software/products/compilers http://www.lahey.com http://www.pathscale.com/products.html